inherited fmYedekParcaFiyatListesi: TfmYedekParcaFiyatListesi
  Tag = 617
  Left = 198
  Top = 175
  Caption = 'Yedek Par'#231'a Fiyat Listesi'
  ClientHeight = 450
  ClientWidth = 950
  PixelsPerInch = 96
  TextHeight = 13
  object PC: TcxPageControl [0]
    Left = 0
    Top = 0
    Width = 950
    Height = 450
    ActivePage = TS1
    Align = alClient
    TabOrder = 0
    ClientRectBottom = 450
    ClientRectRight = 950
    ClientRectTop = 24
    object TS1: TcxTabSheet
      Caption = 'Fiyat Listesi'
      ImageIndex = 0
      object cxGrid1: TcxGrid
        Left = 0
        Top = 0
        Width = 950
        Height = 386
        Align = alClient
        TabOrder = 0
        object cxGrid1DBTableView1: TcxGridDBTableView
          NavigatorButtons.ConfirmDelete = False
          NavigatorButtons.First.Visible = True
          NavigatorButtons.PriorPage.Visible = True
          NavigatorButtons.Prior.Visible = True
          NavigatorButtons.Next.Visible = True
          NavigatorButtons.NextPage.Visible = True
          NavigatorButtons.Last.Visible = True
          NavigatorButtons.Insert.Visible = True
          NavigatorButtons.Append.Visible = False
          NavigatorButtons.Delete.Visible = True
          NavigatorButtons.Edit.Visible = True
          NavigatorButtons.Post.Visible = True
          NavigatorButtons.Cancel.Visible = True
          NavigatorButtons.Refresh.Enabled = False
          NavigatorButtons.Refresh.Visible = False
          NavigatorButtons.SaveBookmark.Enabled = False
          NavigatorButtons.SaveBookmark.Visible = False
          NavigatorButtons.GotoBookmark.Enabled = False
          NavigatorButtons.GotoBookmark.Visible = False
          NavigatorButtons.Filter.Enabled = False
          NavigatorButtons.Filter.Visible = False
          DataController.DataSource = dsEntry
          DataController.Filter.Options = [fcoCaseInsensitive]
          DataController.Summary.DefaultGroupSummaryItems = <>
          DataController.Summary.FooterSummaryItems = <>
          DataController.Summary.SummaryGroups = <>
          FilterRow.InfoText = ' '
          FilterRow.Visible = True
          FilterRow.ApplyChanges = fracImmediately
          OptionsBehavior.AlwaysShowEditor = True
          OptionsBehavior.FocusCellOnTab = True
          OptionsBehavior.FocusFirstCellOnNewRecord = True
          OptionsBehavior.GoToNextCellOnEnter = True
          OptionsData.Appending = True
          OptionsSelection.UnselectFocusedRecordOnExit = False
          OptionsView.Navigator = True
          OptionsView.NoDataToDisplayInfoText = '  '
          OptionsView.Indicator = True
          Styles.Background = dm.cxStyle1
          Styles.Content = dm.cxStyle2
          Styles.ContentEven = cxStyle1
          Styles.ContentOdd = dm.cxStyle4
          Styles.FilterBox = dm.cxStyle5
          Styles.Inactive = dm.cxStyle10
          Styles.IncSearch = dm.cxStyle11
          Styles.Selection = dm.cxStyle14
          Styles.Footer = dm.cxStyle6
          Styles.Group = dm.cxStyle7
          Styles.GroupByBox = dm.cxStyle8
          Styles.Header = dm.cxStyle9
          Styles.Indicator = dm.cxStyle12
          Styles.Preview = dm.cxStyle13
          Styles.StyleSheet = dm.tvssDevExpress
          object cxGrid1DBTableView1Stokkodu: TcxGridDBColumn
            DataBinding.FieldName = 'Stokkodu'
            PropertiesClassName = 'TcxButtonEditProperties'
            Properties.Buttons = <
              item
                Caption = 'yyy'
                Default = True
                Hint = 'xxx'
                Kind = bkEllipsis
                Tag = 1
              end>
            SortIndex = 1
            SortOrder = soAscending
            Width = 118
          end
          object cxGrid1DBTableView1StokkoduLike: TcxGridDBColumn
            Caption = 'Stokkodu (%)'
            DataBinding.FieldName = 'StokkoduLike'
            SortIndex = 0
            SortOrder = soAscending
            Width = 113
          end
          object cxGrid1DBTableView1Fiyat1: TcxGridDBColumn
            DataBinding.FieldName = 'Fiyat1'
            Width = 50
          end
          object cxGrid1DBTableView1Fiyat2: TcxGridDBColumn
            DataBinding.FieldName = 'Fiyat2'
            Width = 50
          end
          object cxGrid1DBTableView1Fiyat3: TcxGridDBColumn
            DataBinding.FieldName = 'Fiyat3'
            Width = 50
          end
          object cxGrid1DBTableView1Fiyat4: TcxGridDBColumn
            DataBinding.FieldName = 'Fiyat4'
            Width = 50
          end
          object cxGrid1DBTableView1Fiyat5: TcxGridDBColumn
            DataBinding.FieldName = 'Fiyat5'
            Width = 50
          end
          object cxGrid1DBTableView1Fiyat6: TcxGridDBColumn
            DataBinding.FieldName = 'Fiyat6'
            Width = 50
          end
          object cxGrid1DBTableView1Fiyat7: TcxGridDBColumn
            DataBinding.FieldName = 'Fiyat7'
            Width = 50
          end
          object cxGrid1DBTableView1Fiyat8: TcxGridDBColumn
            DataBinding.FieldName = 'Fiyat8'
            Width = 50
          end
          object cxGrid1DBTableView1BasTarih: TcxGridDBColumn
            Caption = 'Ba'#351'.Tarih'
            DataBinding.FieldName = 'BasTarih'
            Width = 81
          end
          object cxGrid1DBTableView1BitTarih: TcxGridDBColumn
            Caption = 'Bit.Tarih'
            DataBinding.FieldName = 'BitTarih'
            Width = 76
          end
          object cxGrid1DBTableView1UstGrup: TcxGridDBColumn
            Caption = #220'stGrup'
            DataBinding.FieldName = 'UstGrup'
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.ImmediatePost = True
            Properties.KeyFieldNames = 'id'
            Properties.ListColumns = <
              item
                FieldName = 'isim'
              end>
            Properties.ListSource = dm.dsUstGrup
            Width = 91
          end
          object cxGrid1DBTableView1Grup: TcxGridDBColumn
            DataBinding.FieldName = 'Grup'
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.ImmediatePost = True
            Properties.KeyFieldNames = 'id'
            Properties.ListColumns = <
              item
                FieldName = 'isim'
              end>
            Properties.ListSource = dm.dsGrup
            Width = 101
          end
          object cxGrid1DBTableView1Model: TcxGridDBColumn
            DataBinding.FieldName = 'Model'
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.ImmediatePost = True
            Properties.KeyFieldNames = 'id'
            Properties.ListColumns = <
              item
                FieldName = 'isim'
              end>
            Properties.ListSource = dm.dsModel
            Width = 96
          end
          object cxGrid1DBTableView1AltGrup: TcxGridDBColumn
            Caption = 'Alt Grup'
            DataBinding.FieldName = 'AltGrup'
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.ImmediatePost = True
            Properties.KeyFieldNames = 'id'
            Properties.ListColumns = <
              item
                FieldName = 'isim'
              end>
            Properties.ListSource = dm.dsAltGrup
            Width = 74
          end
          object cxGrid1DBTableView1Carikodu: TcxGridDBColumn
            DataBinding.FieldName = 'Carikodu'
            PropertiesClassName = 'TcxButtonEditProperties'
            Properties.Buttons = <
              item
                Default = True
                Kind = bkEllipsis
              end>
            Properties.ClearKey = 32776
            Width = 130
          end
        end
        object cxGrid1Level1: TcxGridLevel
          GridView = cxGrid1DBTableView1
        end
      end
      object Panel1: TPanel
        Left = 0
        Top = 386
        Width = 950
        Height = 40
        Align = alBottom
        TabOrder = 1
        DesignSize = (
          950
          40)
        object btKapat: TBitBtn
          Left = 855
          Top = 4
          Width = 85
          Height = 32
          Anchors = [akTop, akRight]
          Caption = 'Vazge'#231
          TabOrder = 1
          TabStop = False
          OnClick = btKapatClick
        end
        object btKaydet: TBitBtn
          Left = 10
          Top = 4
          Width = 110
          Height = 32
          Caption = 'Kaydet'
          TabOrder = 0
          TabStop = False
          OnClick = btKaydetClick
        end
      end
    end
    object TS2: TcxTabSheet
      Caption = 'Dosyadan Al'
      ImageIndex = 1
      object cxGrid2: TcxGrid
        Left = 0
        Top = 49
        Width = 950
        Height = 337
        Align = alClient
        TabOrder = 0
        object grdExcel: TcxGridDBTableView
          NavigatorButtons.ConfirmDelete = False
          NavigatorButtons.First.Visible = True
          NavigatorButtons.PriorPage.Visible = True
          NavigatorButtons.Prior.Visible = True
          NavigatorButtons.Next.Visible = True
          NavigatorButtons.NextPage.Visible = True
          NavigatorButtons.Last.Visible = True
          NavigatorButtons.Insert.Visible = True
          NavigatorButtons.Append.Visible = False
          NavigatorButtons.Delete.Visible = True
          NavigatorButtons.Edit.Visible = True
          NavigatorButtons.Post.Visible = True
          NavigatorButtons.Cancel.Visible = True
          NavigatorButtons.Refresh.Enabled = False
          NavigatorButtons.Refresh.Visible = False
          NavigatorButtons.SaveBookmark.Enabled = False
          NavigatorButtons.SaveBookmark.Visible = False
          NavigatorButtons.GotoBookmark.Enabled = False
          NavigatorButtons.GotoBookmark.Visible = False
          NavigatorButtons.Filter.Enabled = False
          NavigatorButtons.Filter.Visible = False
          DataController.DataSource = dsFiyatListe
          DataController.Filter.Options = [fcoCaseInsensitive]
          DataController.Summary.DefaultGroupSummaryItems = <>
          DataController.Summary.FooterSummaryItems = <>
          DataController.Summary.SummaryGroups = <>
          FilterRow.InfoText = ' '
          FilterRow.Visible = True
          FilterRow.ApplyChanges = fracImmediately
          OptionsBehavior.AlwaysShowEditor = True
          OptionsBehavior.FocusCellOnTab = True
          OptionsBehavior.FocusFirstCellOnNewRecord = True
          OptionsBehavior.GoToNextCellOnEnter = True
          OptionsData.Inserting = False
          OptionsSelection.UnselectFocusedRecordOnExit = False
          OptionsView.NoDataToDisplayInfoText = '  '
          OptionsView.ColumnAutoWidth = True
          OptionsView.GroupByBox = False
          OptionsView.Indicator = True
          Styles.Background = dm.cxStyle1
          Styles.Content = dm.cxStyle2
          Styles.ContentEven = cxStyle1
          Styles.ContentOdd = dm.cxStyle4
          Styles.FilterBox = dm.cxStyle5
          Styles.Inactive = dm.cxStyle10
          Styles.IncSearch = dm.cxStyle11
          Styles.Selection = dm.cxStyle14
          Styles.Footer = dm.cxStyle6
          Styles.Group = dm.cxStyle7
          Styles.GroupByBox = dm.cxStyle8
          Styles.Header = dm.cxStyle9
          Styles.Indicator = dm.cxStyle12
          Styles.Preview = dm.cxStyle13
          Styles.StyleSheet = dm.tvssDevExpress
          object grdExcelRef: TcxGridDBColumn
            DataBinding.FieldName = 'Ref'
            Options.Editing = False
            Width = 28
          end
          object grdExcelStokkod: TcxGridDBColumn
            DataBinding.FieldName = 'Stokkod'
            Options.Editing = False
            Width = 167
          end
          object grdExcelStokkodu: TcxGridDBColumn
            DataBinding.FieldName = 'Stokkodu'
            Options.Editing = False
            Width = 181
          end
          object grdExcelFiyat1: TcxGridDBColumn
            DataBinding.FieldName = 'Fiyat1'
            Options.Editing = False
            Width = 100
          end
          object grdExcelFiyat4: TcxGridDBColumn
            Caption = 'Yeni Fiyat'
            DataBinding.FieldName = 'YeniFiyat'
            Width = 61
          end
          object grdExcelYeni: TcxGridDBColumn
            DataBinding.FieldName = 'Yeni'
            Options.Editing = False
            Width = 49
          end
        end
        object cxGridLevel1: TcxGridLevel
          GridView = grdExcel
        end
      end
      object cxGroupBox1: TcxGroupBox
        Left = 0
        Top = 0
        Align = alTop
        Caption = 'Dosyadan Al'
        TabOrder = 1
        Height = 49
        Width = 950
        object Label1: TLabel
          Left = 15
          Top = 22
          Width = 54
          Height = 13
          Caption = 'Dosya Yolu'
        end
        object edtDosya: TcxButtonEdit
          Left = 77
          Top = 17
          Properties.Buttons = <
            item
              Default = True
              Kind = bkEllipsis
            end>
          Properties.ReadOnly = True
          Properties.OnButtonClick = edtDosyaPropertiesButtonClick
          Properties.OnEditValueChanged = edtDosyaPropertiesEditValueChanged
          TabOrder = 0
          Width = 424
        end
        object btOku: TcxButton
          Left = 507
          Top = 13
          Width = 112
          Height = 27
          Caption = 'Dosya Oku'
          Enabled = False
          TabOrder = 1
          OnClick = btOkuClick
        end
        object cbFark: TcxCheckBox
          Left = 638
          Top = 15
          Caption = 'Farklar'#305' G'#246'ster'
          Properties.OnEditValueChanged = cbFarkPropertiesEditValueChanged
          TabOrder = 2
          Width = 121
        end
      end
      object Panel2: TPanel
        Left = 0
        Top = 386
        Width = 950
        Height = 40
        Align = alBottom
        TabOrder = 2
        DesignSize = (
          950
          40)
        object btIptal: TBitBtn
          Left = 855
          Top = 4
          Width = 85
          Height = 32
          Anchors = [akTop, akRight]
          Caption = 'Vazge'#231
          TabOrder = 1
          TabStop = False
          OnClick = btIptalClick
        end
        object btAktar: TBitBtn
          Left = 10
          Top = 4
          Width = 110
          Height = 32
          Caption = 'Aktar'
          Enabled = False
          TabOrder = 0
          TabStop = False
          OnClick = btAktarClick
        end
      end
    end
  end
  inherited alKeyControl: TActionList
    Left = 985
    Top = 619
  end
  inherited XPManifest: TXPManifest
    Left = 1054
    Top = 617
  end
  object aqEntry: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforePost = aqEntryBeforePost
    CommandTimeout = 300
    Parameters = <>
    SQL.Strings = (
      'Select * from TblYedekParcaFiyatListesi Order by Ref')
    Left = 711
    Top = 193
  end
  object dsEntry: TDataSource
    DataSet = aqEntry
    Left = 713
    Top = 254
  end
  object cxStyleRepository1: TcxStyleRepository
    PixelsPerInch = 96
    object cxStyle1: TcxStyle
      AssignedValues = [svColor]
      Color = 16310998
    end
  end
  object aqFiyatTuru: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      'Select * from TblFiyatAdi Order by Ref')
    Left = 472
    Top = 136
  end
  object OD: TOpenDialog
    Filter = 'Excel Files|*.xls'
    Left = 261
    Top = 142
  end
  object aqExcel: TADOQuery
    Connection = dm.cnnnExcel
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'serinos'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 50
        Value = Null
      end>
    SQL.Strings = (
      'select bilisnocik,makinano from fatharhar '
      'where serinos=:serinos')
    Left = 328
    Top = 189
  end
  object dsExcel: TDataSource
    DataSet = aqExcel
    Left = 385
    Top = 189
  end
  object aqFiyatListe: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforePost = aqEntryBeforePost
    CommandTimeout = 300
    Parameters = <>
    SQL.Strings = (
      
        'SELECT Ref,Stokkod,Stokkodu,UstGrup,Grup,Fiyat1,Fiyat2,Fiyat3,Ye' +
        'niFiyat=0,Yeni=0,Fark=0'
      'INTO #XYPFL FROM TblYedekParcaFiyatListesi WITH(NOLOCK)'
      'SELECT * FROM #XYPFL DROP TABLE #XYPFL'
      ''
      '')
    Left = 598
    Top = 161
  end
  object dsFiyatListe: TDataSource
    DataSet = aqFiyatListe
    Left = 600
    Top = 222
  end
end
